home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 12 / CU Amiga Magazine's Super CD-ROM 12 (1997)(EMAP Images)(GB)[!][issue 1997-07].iso / WWW / http / www.haage-partner.com / sc_ed.gif < prev    next >
Graphics Interchange Format  |  1997-05-12  |  12KB  |  554x393  |  4-bit (11 colors)
Labels: text | electronics | screenshot | display | software | computer icon | operating system | web page | multimedia software
OCR: WORK: Storm C/Examples/Colorwheel/ColorWheel.c E T S 0 R M Shows 'M' if text is modified. X: 25 V: 55 L: 265 void main(void) struct Screen #Myscreen; struct Window #Mywindow; struct IntuiMessage #msg; struct Gadget #colwheel, #gradslid; #define GRADCOLORS 4 ULONG colortable [96] mywinsig; struct load32 color_list [GRADCOLORS + 1] ; WORD penns [GRADCOLORS + 1] ; WORD Closeflag = FALSE; struct ColorWheelRGB rgb; BOOL struct ColorWhee (HSB hsb; WORD numPens; ULONG modeID = HIRES_KEY; UWORD maxdepth; DisplayInfoHandle displayhandle; struct DimensionInfo dimensioninfo; ULONG gdidres; ULONG exitvalue = RETURN_FAIL; if (IntuitionBase = OpenLibrary( "intuition. library",39)> if (GfxBase = OpenLibrary( "graphics. library", 39)>' if (ColorWheelBase = OpenLibrary( "gadgets/colorwheel . gadget",39L)> if (GradientSliderBase=OpenLibrary("gadgets/gradients lider. gadget", 39L> > if (displayhandle = FindDisplayInfo(modeID> > if (gdidres=GetDisplayInfoData(displayhandle, (UBYTE #) &dimensioninfo, sizeof (struct DimensionInfo>, DTAG_DIMS, NULL> > maxdepth = dimensioninfo. MaxDepth; Myscreen = OpenScreenTags (NULL, SA_Depth, maxdepth,